home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 31
/
Aminet 31 (1999)(Schatztruhe)[!][Jun 1999].iso
/
Aminet
/
dev
/
asm
/
ESA.readme
< prev
next >
Wrap
Text File
|
1999-05-02
|
2KB
|
60 lines
Short: Extended Syntax Assembly v1.8
Author: bevilacq@cli.di.unipi.it (Simone Bevilacqua)
Uploader: bevilacq@cli.di.unipi.it (Simone Bevilacqua)
Type: dev/asm
Requires: 020+ CPU, KS 2.0
Replaces: dev/asm/ESA.lha
Ever heard of "inline asm" inside C, Pascal, etc. ?
Well, here we have "inline C, Pascal, etc." inside asm!
Look below: that's a small sample of ESA code!!!
procedure CpyQtd{a1-a2},d0-d1/a1-a2
move.b (a1)+,d0 ;get "quote"
repeat
move.b (a1)+,d1
switch.s d1.b
-> d0 ;successful copy
clr.b (a1) ;NULL-termination
moveq.l #0,d1 ;exit loop
-> #0 ;unvalid char, exit loop
suba.l a1,a1 ;please, let it be...
-> #10 ;unvalid char
moveq.l #0,d1 ;exit loop
suba.l a1,a1 ;please, let it be...
def
move.b d1,(a2)+ ;copy char
eswitch
until.s ~d1.b
movea.l a1,a0 ;new string ptr
eproc
============================= Archive contents =============================
Original Packed Ratio Date Time Name
-------- ------- ----- --------- -------- -------------
24664 13402 45.6% 04-Feb-80 08:40:24 +ESA
104560 32312 69.0% 04-Feb-80 08:40:18 +ESA.guide
2820 973 65.4% 04-Feb-80 08:40:18 +MergeSort.ei
1724 723 58.0% 04-Feb-80 08:40:18 +QuickSort.ei
3784 1303 65.5% 04-Feb-80 08:40:18 +readme
2714 1012 62.7% 04-Feb-80 08:40:18 +data.i
1219 452 62.9% 04-Feb-80 08:40:18 +defs.i
898 348 61.2% 04-Feb-80 08:40:18 +main.esa
6709 2051 69.4% 04-Feb-80 08:40:18 +misc.ei
6594 2286 65.3% 04-Feb-80 08:40:18 +opt.ei
1900 858 54.8% 04-Feb-80 08:40:18 +split.ei
526 283 46.1% 04-Feb-80 08:40:18 +do
12572 4501 64.1% 04-Feb-80 08:40:18 +sss.guide
359 231 35.6% 04-Feb-80 08:40:18 +sss.readme
6672 1970 70.4% 04-Feb-80 08:40:18 +VBR2FAST.esa
-------- ------- ----- --------- --------
177715 62705 64.7% 14-Apr-99 07:15:46 15 files